VecValueTemp=[126 127 128 130 132 134 136 137 139 142 313 318 320 322];
for n1=1:size(VecValueTemp,2)
    FilterFourthLevelEditorsCoAuthors(VecValueTemp(1,n1));
    FilterFourthLevelEditorsCoAuthors2(VecValueTemp(1,n1));
end